home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ MSDOSSYS 5.xpl < prev    next >
Text File  |  2001-01-21  |  2KB  |  73 lines

  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="7"
  3. "COUNT"="3"
  4. "UIPATH 1"="Startup/Shutdown\Startup\Windows 9x/ME\10) Boot Menu"
  5. "NAME"="Advanced Options (Win 98/ME)"
  6. "VERSION"="1.32"
  7. "OSVERSION"="00101"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Disable "Double Buffering""
  10. "TEXT 2"="Enable "Double Buffering" only if needed"
  11. "TEXT 3"="ALWAYS enable "Double Buffering""
  12. "DESCRIPTION 1"="Double Buffering doubles the default buffer size of Windows's use of the hard drive and results in enhanced performance."
  13. "DESCRIPTION 2"="This setting should be left alone if you are using IDE/ATA hard drive(s) as it only affects SCSI drives."
  14. "AUTHOR"="Xteq Systems"
  15. "CONTACTURL"="http://www.xteq.com"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 1"=" "
  18. "COMMENT 2"="Thanks to CptSiskoX and Pierre Szwarc for their help!"
  19. "COMMENT 3"="Thanks to Randall Nowell [rnowell@magma.ca] for the "2 vs 1 mix-up" bug notice."
  20. "COMMENT 2"="Thanks to Petr Tandler [mailto:tanpe@volny.cz] for the "SCSI drives only" notice!"
  21.  
  22.  
  23. 'Declaration of some constants
  24. sF="C:\MSDOS.SYS"
  25. sO="OPTIONS"
  26.  
  27. 'Called when the Plugin is started
  28. Sub Plugin_Initialize
  29.   Call FileSetAttribute(sf,"S-")
  30.   Call FileSetAttribute(sf,"R-")
  31.   Call FileSetAttribute(sf,"H-")
  32.  
  33.   i=IniReadValue(sf,so,"DoubleBuffer")
  34.   if i=0 then 
  35.      SetUIElement 1,true
  36.   else
  37.     if i=2 then
  38.        SetUIElement 3,true
  39.     else
  40.        SetUIElement 2,true
  41.     end if
  42.   end if  
  43. End Sub
  44.  
  45. 'Called when the Plugin should validate the Data the user has entered
  46. Sub Plugin_CheckData(ElementIndex)
  47. End Sub
  48.  
  49. 'Called when the Plugin should apply the changes
  50. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  51.  if GetUIElement(1)=true then
  52.     i=0
  53.  else
  54.     if GetUIElement(2)=true then
  55.        i=1
  56.     else
  57.        i=2
  58.     end if
  59.  end if
  60.  
  61.  Call IniWriteValue(sf,so,"DoubleBuffer",i)
  62.  
  63.  
  64.  Call Restart()
  65. End Sub
  66.  
  67. 'Called when the Plugin is about to be removed from memory
  68. Sub Plugin_Terminate
  69.  Call FileSetAttribute("C:\MSDOS.SYS","S+")
  70.  Call FileSetAttribute("C:\MSDOS.SYS","R+")
  71.  Call FileSetAttribute("C:\MSDOS.SYS","H+")
  72. End Sub
  73.